COMMENT ā VALID 00002 PAGES C REC PAGE DESCRIPTION C00001 00001 C00002 00002 BEGIN "TEST" C00003 ENDMK Cā; BEGIN "TEST" INTEGER ARRAY A[1:2]; PROCEDURE B(INTEGER ARRAY A1); BEGIN A1[1]ā1; END; B(A); END "TEST";